# -*- mode: snippet -*-
# name: spower Simulate Power Of Cox/Log-Rank Two-Sample Test
# key: spower
# key: Hmisc.spower
# contributor: Shuguang Sun
# --
Hmisc::spower(rcontrol, rinterv, rcens, nc, ni,
test=logrank, cox=FALSE, nsim=500, alpha=0.05, pr=TRUE)